# Load plots
load("Data/exp_2/plot.Rdata")
load("Data/exp_3/plot.Rdata")

# Combine plots
exp2_plot / exp3_plot + plot_layout(guides = "collect") & theme(legend.position = "bottom")

# Save plot
ggsave(
    "Images/exps_plot.png",
    width = 14, height = 6
)
